CAAEclipses_CalculateSolar <-
function(k){
.Call("CAAEclipses_CalculateSolar", k)
}
